home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / C / Applications / Python 1.3.3 / Python 133 SRC / Mac / Compat / sync.c < prev   
Text File  |  1994-08-19  |  360b  |  18 lines

  1. /* The equivalent of the Unix 'sync' system call: FlushVol.
  2.    Public domain by Guido van Rossum, CWI, Amsterdam (July 1987).
  3.    For now, we only flush the default volume
  4.    (since that's the only volume written to by MacB). */
  5.  
  6. #include "macdefs.h"
  7.  
  8. int
  9. sync()
  10. {
  11.     if (FlushVol((StringPtr)0, 0) == noErr)
  12.         return 0;
  13.     else {
  14.         errno= ENODEV;
  15.         return -1;
  16.     }
  17. }
  18.